object frmQE: TfrmQE Left = 321 Top = 91 BorderStyle = bsNone Caption = 'frmQE' ClientHeight = 220 ClientWidth = 316 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] KeyPreview = True OldCreateOrder = False Position = poScreenCenter PixelsPerInch = 96 TextHeight = 13 object Shape1: TShape Left = 0 Top = 0 Width = 316 Height = 220 Align = alClient end object Panel1: TPanel Left = 0 Top = 0 Width = 316 Height = 220 Align = alClient BevelWidth = 3 Color = clWhite TabOrder = 0 object Label2: TLabel Left = 8 Top = 8 Width = 264 Height = 29 Caption = 'Quotas Extraordin�rias' Font.Charset = ANSI_CHARSET Font.Color = clGray Font.Height = -24 Font.Name = 'Arial' Font.Style = [fsBold] ParentFont = False Transparent = True end object Label1: TLabel Left = 10 Top = 48 Width = 288 Height = 39 Alignment = taCenter Caption = 'Seleccione qual o tipo de quota que pretende utilizar para calcu' + 'lar o valor das Quotas Extraordin�rias que cabe a cada cond�mino' + '.' WordWrap = True end object BitBtn1: TBitBtn Left = 216 Top = 168 Width = 75 Height = 25 Caption = 'Ok' TabOrder = 0 Kind = bkOK end object RadioGroup1: TRadioGroup Left = 10 Top = 93 Width = 103 Height = 113 Caption = ' Tipo de Quota ' ItemIndex = 0 Items.Strings = ( 'Fixa' 'Permilagem' '�rea') TabOrder = 1 OnClick = RadioGroup1Click end object CurrencyEdit1: TCurrencyEdit Left = 120 Top = 110 Width = 110 Height = 21 AutoSize = False Color = clBtnFace DisplayFormat = ',0.00;-,0.00' TabOrder = 2 end end end